home *** CD-ROM | disk | FTP | other *** search
| Unknown | 1993-12-22 | 10.5 KB | [PROL/SIGM] |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 100%
| file
| data
| default
|
|
| id metadata |
|---|
| key | value |
|---|
| macFileType | [PROL] |
| macFileCreator | [SIGM] |
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 46 00 04 0b 3c | 45 44 49 4e 42 55 52 47 |...F...<|EDINBURG|
|00000010| 48 3e 00 00 00 00 0b 3c | 49 4e 54 45 52 50 52 45 |H>.....<|INTERPRE|
|00000020| 54 3e 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |T>......|........|
|00000030| 00 00 00 00 00 00 03 8e | 80 40 0d 95 5c a0 00 00 |........|.@..\...|
|00000040| 00 21 00 00 00 1e 00 00 | 00 00 00 00 00 00 05 6d |.!......|.......m|
|00000050| 65 61 6c 73 00 63 68 16 | 00 63 68 00 00 05 be 12 |eals.ch.|.ch.....|
|00000060| 00 05 00 00 24 de 00 00 | 00 00 00 00 20 0b 00 63 |....$...|.... ..c|
|00000070| 67 86 00 05 bf 76 00 09 | 95 88 00 54 7e 28 00 01 |g....v..|...T~(..|
|00000080| 14 62 00 63 67 86 00 63 | 68 16 40 80 95 6c 40 80 |.b.cg..c|h.@..l@.|
|00000090| aa ec 00 00 00 00 00 00 | 0d 3a 00 4c 27 30 00 00 |........|.:.L'0..|
|000000a0| 02 00 00 00 00 00 00 00 | 00 4e 00 00 00 01 00 63 |........|.N.....c|
|000000b0| 67 fe 00 0e b9 38 00 00 | b1 d0 00 4c 27 30 00 63 |g....8..|...L'0.c|
|000000c0| 68 30 00 dd 44 00 00 05 | 00 04 00 05 c0 54 4e f9 |h0..D...|.....TN.|
|000000d0| 00 12 00 30 82 e0 00 63 | 70 50 00 30 e4 42 00 00 |...0...c|pP.0.B..|
|000000e0| 00 03 00 63 67 ee 00 2f | 83 00 00 63 68 30 00 63 |...cg../|...ch0.c|
|000000f0| 75 64 00 3b 52 d4 00 05 | bf 32 00 05 bf 42 00 01 |ud.;R...|.2...B..|
|00000100| 14 62 00 63 67 fe 00 63 | 67 fe 00 00 00 01 00 30 |.b.cg..c|g......0|
|00000110| e4 28 00 29 5f d6 00 30 | e4 34 00 61 d8 be 00 00 |.(.)_..0|.4.a....|
|00000120| 00 00 00 05 a0 03 40 80 | a5 aa 00 00 00 00 00 00 |......@.|........|
|00000130| 70 56 00 30 e4 22 0d 3a | 5e 1a 00 00 01 01 00 4c |pV.0.".:|^......L|
|00000140| 27 30 00 00 00 01 00 00 | 00 01 00 00 00 00 00 28 |'0......|.......(|
|00000150| 00 04 01 23 01 ae 00 00 | 00 0a 00 09 00 04 00 30 |...#....|.......0|
|00000160| 00 01 00 00 00 00 00 00 | 08 6c 00 00 0d 0d 2f 2a |........|.l..../*|
|00000170| 20 61 6e 79 20 6f 6c 64 | 20 6d 65 61 6c 20 63 6f | any old| meal co|
|00000180| 6e 73 69 73 74 73 20 6f | 66 20 61 20 73 74 61 72 |nsists o|f a star|
|00000190| 74 65 72 2c 20 6d 61 69 | 6e 20 64 69 73 68 2c 20 |ter, mai|n dish, |
|000001a0| 64 65 73 73 65 72 74 20 | 61 6e 64 20 77 69 6e 65 |dessert |and wine|
|000001b0| 20 2a 2f 0d 0d 61 6e 79 | 5f 6d 65 61 6c 28 53 74 | */..any|_meal(St|
|000001c0| 61 72 74 65 72 2c 4d 61 | 69 6e 2c 44 65 73 73 65 |arter,Ma|in,Desse|
|000001d0| 72 74 2c 57 69 6e 65 29 | 20 3a 2d 0d 20 20 73 74 |rt,Wine)| :-. st|
|000001e0| 61 72 74 65 72 28 53 74 | 61 72 74 65 72 29 2c 0d |arter(St|arter),.|
|000001f0| 20 20 6d 61 69 6e 28 4d | 61 69 6e 29 2c 0d 20 20 | main(M|ain),. |
|00000200| 64 65 73 73 65 72 74 28 | 44 65 73 73 65 72 74 29 |dessert(|Dessert)|
|00000210| 2c 0d 20 20 77 69 6e 65 | 28 57 69 6e 65 29 2e 0d |,. wine|(Wine)..|
|00000220| 0d 2f 2a 20 61 20 67 6f | 6f 64 20 6d 65 61 6c 20 |./* a go|od meal |
|00000230| 69 73 20 6f 6e 65 20 77 | 68 65 72 65 20 74 68 65 |is one w|here the|
|00000240| 20 73 74 61 72 74 65 72 | 20 61 6e 64 20 77 69 6e | starter| and win|
|00000250| 65 20 61 72 65 20 6f 6b | 20 77 69 74 68 20 74 68 |e are ok| with th|
|00000260| 65 20 6d 61 69 6e 20 64 | 69 73 68 20 2a 2f 0d 0d |e main d|ish */..|
|00000270| 67 6f 6f 64 5f 6d 65 61 | 6c 28 53 74 61 72 74 65 |good_mea|l(Starte|
|00000280| 72 2c 4d 61 69 6e 2c 44 | 65 73 73 65 72 74 2c 57 |r,Main,D|essert,W|
|00000290| 69 6e 65 29 20 3a 2d 0d | 20 20 61 6e 79 5f 6d 65 |ine) :-.| any_me|
|000002a0| 61 6c 28 53 74 61 72 74 | 65 72 2c 4d 61 69 6e 2c |al(Start|er,Main,|
|000002b0| 44 65 73 73 65 72 74 2c | 57 69 6e 65 29 2c 0d 20 |Dessert,|Wine),. |
|000002c0| 20 73 74 61 72 74 65 72 | 5f 6f 6b 28 53 74 61 72 | starter|_ok(Star|
|000002d0| 74 65 72 2c 4d 61 69 6e | 29 2c 0d 20 20 77 69 6e |ter,Main|),. win|
|000002e0| 65 5f 6f 6b 28 57 69 6e | 65 2c 4d 61 69 6e 29 2e |e_ok(Win|e,Main).|
|000002f0| 0d 0d 2f 2a 20 61 20 63 | 68 65 61 70 20 6d 65 61 |../* a c|heap mea|
|00000300| 6c 20 69 73 20 61 6e 79 | 20 6d 65 61 6c 20 63 6f |l is any| meal co|
|00000310| 73 74 69 6e 67 20 6c 65 | 73 73 20 74 68 61 6e 20 |sting le|ss than |
|00000320| a3 31 35 20 2a 2f 0d 0d | 63 68 65 61 70 5f 6d 65 |.15 */..|cheap_me|
|00000330| 61 6c 28 53 74 61 72 74 | 65 72 2c 4d 61 69 6e 2c |al(Start|er,Main,|
|00000340| 44 65 73 73 65 72 74 2c | 57 69 6e 65 29 20 3a 2d |Dessert,|Wine) :-|
|00000350| 0d 20 20 61 6e 79 5f 6d | 65 61 6c 28 53 74 61 72 |. any_m|eal(Star|
|00000360| 74 65 72 2c 4d 61 69 6e | 2c 44 65 73 73 65 72 74 |ter,Main|,Dessert|
|00000370| 2c 57 69 6e 65 29 2c 0d | 20 20 63 6f 73 74 28 53 |,Wine),.| cost(S|
|00000380| 74 61 72 74 65 72 2c 4d | 61 69 6e 2c 44 65 73 73 |tarter,M|ain,Dess|
|00000390| 65 72 74 2c 57 69 6e 65 | 2c 43 6f 73 74 29 2c 0d |ert,Wine|,Cost),.|
|000003a0| 20 20 43 6f 73 74 20 3c | 20 31 35 2e 0d 0d 2f 2a | Cost <| 15.../*|
|000003b0| 20 61 20 79 75 70 70 69 | 65 20 6d 65 61 6c 20 6d | a yuppi|e meal m|
|000003c0| 75 73 74 20 62 65 20 61 | 20 67 6f 6f 64 20 6d 65 |ust be a| good me|
|000003d0| 61 6c 20 63 6f 73 74 69 | 6e 67 20 6d 6f 72 65 20 |al costi|ng more |
|000003e0| 74 68 61 6e 20 a3 33 30 | 20 2a 2f 0d 0d 79 75 70 |than .30| */..yup|
|000003f0| 70 69 65 5f 6d 65 61 6c | 28 53 74 61 72 74 65 72 |pie_meal|(Starter|
|00000400| 2c 4d 61 69 6e 2c 44 65 | 73 73 65 72 74 2c 57 69 |,Main,De|ssert,Wi|
|00000410| 6e 65 29 20 3a 2d 0d 20 | 20 67 6f 6f 64 5f 6d 65 |ne) :-. | good_me|
|00000420| 61 6c 28 53 74 61 72 74 | 65 72 2c 4d 61 69 6e 2c |al(Start|er,Main,|
|00000430| 44 65 73 73 65 72 74 2c | 57 69 6e 65 29 2c 0d 20 |Dessert,|Wine),. |
|00000440| 20 63 6f 73 74 28 53 74 | 61 72 74 65 72 2c 4d 61 | cost(St|arter,Ma|
|00000450| 69 6e 2c 44 65 73 73 65 | 72 74 2c 57 69 6e 65 2c |in,Desse|rt,Wine,|
|00000460| 43 6f 73 74 29 2c 0d 20 | 20 43 6f 73 74 20 3e 20 |Cost),. | Cost > |
|00000470| 33 30 2e 0d 0d 2f 2a 20 | 61 20 64 69 65 74 20 6d |30.../* |a diet m|
|00000480| 65 61 6c 20 69 73 20 61 | 6e 79 20 6d 65 61 6c 20 |eal is a|ny meal |
|00000490| 77 69 74 68 20 66 65 77 | 65 72 20 74 68 61 6e 20 |with few|er than |
|000004a0| 36 35 30 20 63 61 6c 6f | 72 69 65 73 20 2a 2f 0d |650 calo|ries */.|
|000004b0| 0d 64 69 65 74 5f 6d 65 | 61 6c 28 53 74 61 72 74 |.diet_me|al(Start|
|000004c0| 65 72 2c 4d 61 69 6e 2c | 44 65 73 73 65 72 74 2c |er,Main,|Dessert,|
|000004d0| 57 69 6e 65 29 20 3a 2d | 0d 20 20 61 6e 79 5f 6d |Wine) :-|. any_m|
|000004e0| 65 61 6c 28 53 74 61 72 | 74 65 72 2c 4d 61 69 6e |eal(Star|ter,Main|
|000004f0| 2c 44 65 73 73 65 72 74 | 2c 57 69 6e 65 29 2c 0d |,Dessert|,Wine),.|
|00000500| 20 20 65 6e 65 72 67 79 | 28 53 74 61 72 74 65 72 | energy|(Starter|
|00000510| 2c 4d 61 69 6e 2c 44 65 | 73 73 65 72 74 2c 57 69 |,Main,De|ssert,Wi|
|00000520| 6e 65 2c 43 61 6c 6f 72 | 69 65 73 29 2c 0d 20 20 |ne,Calor|ies),. |
|00000530| 43 61 6c 6f 72 69 65 73 | 20 3c 20 36 35 30 2e 0d |Calories| < 650..|
|00000540| 0d 2f 2a 20 61 20 67 6c | 75 74 74 6f 6e 20 6d 65 |./* a gl|utton me|
|00000550| 61 6c 20 6d 75 73 74 20 | 62 65 20 61 20 67 6f 6f |al must |be a goo|
|00000560| 64 20 6f 6e 65 20 77 69 | 74 68 20 6f 76 65 72 20 |d one wi|th over |
|00000570| 31 35 30 30 20 63 61 6c | 6f 72 69 65 73 20 2a 2f |1500 cal|ories */|
|00000580| 0d 0d 67 6c 75 74 74 6f | 6e 5f 6d 65 61 6c 28 53 |..glutto|n_meal(S|
|00000590| 74 61 72 74 65 72 2c 4d | 61 69 6e 2c 44 65 73 73 |tarter,M|ain,Dess|
|000005a0| 65 72 74 2c 57 69 6e 65 | 29 20 3a 2d 0d 20 20 67 |ert,Wine|) :-. g|
|000005b0| 6f 6f 64 5f 6d 65 61 6c | 28 53 74 61 72 74 65 72 |ood_meal|(Starter|
|000005c0| 2c 4d 61 69 6e 2c 44 65 | 73 73 65 72 74 2c 57 69 |,Main,De|ssert,Wi|
|000005d0| 6e 65 29 2c 0d 20 20 65 | 6e 65 72 67 79 28 53 74 |ne),. e|nergy(St|
|000005e0| 61 72 74 65 72 2c 4d 61 | 69 6e 2c 44 65 73 73 65 |arter,Ma|in,Desse|
|000005f0| 72 74 2c 57 69 6e 65 2c | 43 61 6c 6f 72 69 65 73 |rt,Wine,|Calories|
|00000600| 29 2c 0d 20 20 43 61 6c | 6f 72 69 65 73 20 3e 20 |),. Cal|ories > |
|00000610| 31 35 30 30 2e 0d 0d 2f | 2a 20 61 20 73 74 61 72 |1500.../|* a star|
|00000620| 74 65 72 20 69 73 20 6f | 6b 20 69 66 20 69 74 20 |ter is o|k if it |
|00000630| 69 73 20 6e 6f 74 20 74 | 68 65 20 73 61 6d 65 20 |is not t|he same |
|00000640| 74 79 70 65 20 6f 66 20 | 64 69 73 68 20 61 73 20 |type of |dish as |
|00000650| 74 68 65 20 6d 61 69 6e | 20 63 6f 75 72 73 65 20 |the main| course |
|00000660| 2a 2f 0d 0d 73 74 61 72 | 74 65 72 5f 6f 6b 28 53 |*/..star|ter_ok(S|
|00000670| 74 61 72 74 65 72 2c 4d | 61 69 6e 29 20 3a 2d 0d |tarter,M|ain) :-.|
|00000680| 20 20 64 69 73 68 5f 74 | 79 70 65 28 53 74 61 72 | dish_t|ype(Star|
|00000690| 74 65 72 2c 54 79 70 65 | 29 2c 0d 20 20 6e 6f 74 |ter,Type|),. not|
|000006a0| 20 64 69 73 68 5f 74 79 | 70 65 28 4d 61 69 6e 2c | dish_ty|pe(Main,|
|000006b0| 54 79 70 65 29 2e 0d 0d | 2f 2a 20 77 68 69 74 65 |Type)...|/* white|
|000006c0| 20 77 69 6e 65 73 20 61 | 72 65 20 6f 6b 20 77 69 | wines a|re ok wi|
|000006d0| 74 68 20 66 69 73 68 20 | 61 6e 64 20 70 6f 75 6c |th fish |and poul|
|000006e0| 74 72 79 2c 20 61 6e 64 | 20 72 65 64 20 6f 6e 65 |try, and| red one|
|000006f0| 73 20 77 69 74 68 20 6d | 65 61 74 20 2a 2f 0d 0d |s with m|eat */..|
|00000700| 77 69 6e 65 5f 6f 6b 28 | 57 69 6e 65 2c 4d 61 69 |wine_ok(|Wine,Mai|
|00000710| 6e 29 20 3a 2d 0d 20 20 | 63 6f 6c 6f 75 72 28 57 |n) :-. |colour(W|
|00000720| 69 6e 65 2c 77 68 69 74 | 65 29 2c 0d 20 20 64 69 |ine,whit|e),. di|
|00000730| 73 68 5f 74 79 70 65 28 | 4d 61 69 6e 2c 70 6f 75 |sh_type(|Main,pou|
|00000740| 6c 74 72 79 29 2e 0d 77 | 69 6e 65 5f 6f 6b 28 57 |ltry)..w|ine_ok(W|
|00000750| 69 6e 65 2c 4d 61 69 6e | 29 20 3a 2d 0d 20 20 63 |ine,Main|) :-. c|
|00000760| 6f 6c 6f 75 72 28 57 69 | 6e 65 2c 77 68 69 74 65 |olour(Wi|ne,white|
|00000770| 29 2c 0d 20 20 64 69 73 | 68 5f 74 79 70 65 28 4d |),. dis|h_type(M|
|00000780| 61 69 6e 2c 66 69 73 68 | 29 2e 0d 77 69 6e 65 5f |ain,fish|)..wine_|
|00000790| 6f 6b 28 57 69 6e 65 2c | 4d 61 69 6e 29 20 3a 2d |ok(Wine,|Main) :-|
|000007a0| 0d 20 20 63 6f 6c 6f 75 | 72 28 57 69 6e 65 2c 72 |. colou|r(Wine,r|
|000007b0| 65 64 29 2c 0d 20 20 64 | 69 73 68 5f 74 79 70 65 |ed),. d|ish_type|
|000007c0| 28 4d 61 69 6e 2c 6d 65 | 61 74 29 2e 0d 0d 2f 2a |(Main,me|at).../*|
|000007d0| 20 74 68 65 20 63 6f 73 | 74 20 6f 66 20 61 20 6d | the cos|t of a m|
|000007e0| 65 61 6c 20 69 73 20 74 | 68 65 20 70 72 69 63 65 |eal is t|he price|
|000007f0| 20 70 6c 75 73 20 31 35 | 25 20 76 61 74 20 61 6e | plus 15|% vat an|
|00000800| 64 20 31 32 2e 35 25 20 | 73 65 72 76 69 63 65 20 |d 12.5% |service |
|00000810| 63 68 61 72 67 65 20 2a | 2f 0d 0d 63 6f 73 74 28 |charge *|/..cost(|
|00000820| 53 74 61 72 74 65 72 2c | 4d 61 69 6e 2c 44 65 73 |Starter,|Main,Des|
|00000830| 73 65 72 74 2c 57 69 6e | 65 2c 43 6f 73 74 29 20 |sert,Win|e,Cost) |
|00000840| 3a 2d 0d 20 20 70 72 69 | 63 65 28 53 74 61 72 74 |:-. pri|ce(Start|
|00000850| 65 72 2c 50 72 63 31 29 | 2c 0d 20 20 70 72 69 63 |er,Prc1)|,. pric|
|00000860| 65 28 4d 61 69 6e 2c 50 | 72 63 32 29 2c 0d 20 20 |e(Main,P|rc2),. |
|00000870| 70 72 69 63 65 28 44 65 | 73 73 65 72 74 2c 50 72 |price(De|ssert,Pr|
|00000880| 63 33 29 2c 0d 20 20 70 | 72 69 63 65 28 57 69 6e |c3),. p|rice(Win|
|00000890| 65 2c 50 72 63 34 29 2c | 0d 20 20 43 6f 73 74 20 |e,Prc4),|. Cost |
|000008a0| 69 73 20 28 50 72 63 31 | 20 2b 20 50 72 63 32 20 |is (Prc1| + Prc2 |
|000008b0| 2b 20 50 72 63 33 20 2b | 20 50 72 63 34 29 20 2a |+ Prc3 +| Prc4) *|
|000008c0| 20 31 2e 31 35 20 2a 20 | 31 2e 31 32 35 2e 0d 0d | 1.15 * |1.125...|
|000008d0| 2f 2a 20 74 68 65 20 6e | 75 6d 62 65 72 20 6f 66 |/* the n|umber of|
|000008e0| 20 63 61 6c 6f 72 69 65 | 73 20 69 6e 20 61 20 6d | calorie|s in a m|
|000008f0| 65 61 6c 20 69 73 20 74 | 68 65 20 74 6f 74 61 6c |eal is t|he total|
|00000900| 20 65 6e 65 72 67 79 20 | 6f 66 20 74 68 65 20 66 | energy |of the f|
|00000910| 6f 75 72 20 70 61 72 74 | 73 20 2a 2f 0d 0d 65 6e |our part|s */..en|
|00000920| 65 72 67 79 28 53 74 61 | 72 74 65 72 2c 4d 61 69 |ergy(Sta|rter,Mai|
|00000930| 6e 2c 44 65 73 73 65 72 | 74 2c 57 69 6e 65 2c 43 |n,Desser|t,Wine,C|
|00000940| 61 6c 6f 72 69 65 73 29 | 20 3a 2d 0d 20 20 63 61 |alories)| :-. ca|
|00000950| 6c 6f 72 69 65 73 28 53 | 74 61 72 74 65 72 2c 43 |lories(S|tarter,C|
|00000960| 61 6c 31 29 2c 0d 20 20 | 63 61 6c 6f 72 69 65 73 |al1),. |calories|
|00000970| 28 4d 61 69 6e 2c 43 61 | 6c 32 29 2c 0d 20 20 63 |(Main,Ca|l2),. c|
|00000980| 61 6c 6f 72 69 65 73 28 | 44 65 73 73 65 72 74 2c |alories(|Dessert,|
|00000990| 43 61 6c 33 29 2c 0d 20 | 20 63 61 6c 6f 72 69 65 |Cal3),. | calorie|
|000009a0| 73 28 57 69 6e 65 2c 43 | 61 6c 34 29 2c 0d 20 20 |s(Wine,C|al4),. |
|000009b0| 43 61 6c 6f 72 69 65 73 | 20 69 73 20 43 61 6c 31 |Calories| is Cal1|
|000009c0| 20 2b 20 43 61 6c 32 20 | 2b 20 43 61 6c 33 20 2b | + Cal2 |+ Cal3 +|
|000009d0| 20 43 61 6c 34 2e 0d 0d | 0b 3c 45 44 49 4e 42 55 | Cal4...|.<EDINBU|
|000009e0| 52 47 48 3e 00 00 00 00 | 0b 3c 49 4e 54 45 52 50 |RGH>....|.<INTERP|
|000009f0| 52 45 54 3e 00 00 00 00 | 00 00 00 00 00 00 00 00 |RET>....|........|
|00000a00| 00 00 00 00 00 00 00 00 | 03 89 56 00 0d 95 5c a3 |........|..V...\.|
|00000a10| 00 00 00 21 00 00 00 1e | 00 00 00 00 00 00 00 00 |...!....|........|
|00000a20| 0a 6d 65 61 6c 73 20 64 | 61 74 61 63 68 00 00 05 |.meals d|atach...|
|00000a30| be 12 00 05 00 00 24 de | 00 00 00 00 00 00 20 0b |......$.|...... .|
|00000a40| 00 63 67 86 00 05 bf 76 | 00 09 95 88 00 54 7e 28 |.cg....v|.....T~(|
|00000a50| 00 01 14 62 00 63 67 86 | 00 63 68 16 40 80 95 6c |...b.cg.|.ch.@..l|
|00000a60| 40 80 aa ec 00 00 00 00 | 00 00 0d 3a 00 4c 27 30 |@.......|...:.L'0|
|00000a70| 00 00 0c 00 00 00 00 00 | 00 00 0a 20 00 00 00 01 |........|... ....|
|00000a80| 00 63 67 fe 00 0e b9 38 | 00 00 b1 d0 00 4c 27 30 |.cg....8|.....L'0|
|00000a90| 00 63 68 30 00 dd 1e 00 | 00 05 00 04 00 05 c0 54 |.ch0....|.......T|
|00000aa0| 4e f9 00 12 00 30 82 e0 | 00 63 70 50 00 30 e4 42 |N....0..|.cpP.0.B|
|00000ab0| 00 00 00 03 00 63 67 ee | 00 2f 83 00 00 63 68 30 |.....cg.|./...ch0|
|00000ac0| 00 63 75 64 00 3b 52 d4 | 00 05 bf 32 00 05 bf 42 |.cud.;R.|...2...B|
|00000ad0| 00 01 14 62 00 63 67 fe | 00 63 67 fe 00 00 00 01 |...b.cg.|.cg.....|
|00000ae0| 00 30 e4 28 00 29 66 12 | 00 30 e4 34 00 61 d8 be |.0.(.)f.|.0.4.a..|
|00000af0| 00 00 00 00 00 05 a0 03 | 40 80 a5 aa 00 00 00 00 |........|@.......|
|00000b00| 00 00 70 56 00 30 e4 22 | 0d 3a 64 56 00 00 01 01 |..pV.0."|.:dV....|
|00000b10| 00 4c 27 30 00 00 00 01 | 00 00 00 01 00 00 00 00 |.L'0....|........|
|00000b20| 00 38 00 06 01 29 01 e5 | 00 00 00 0a 00 09 00 04 |.8...)..|........|
|00000b30| 00 30 00 01 00 00 00 00 | 00 00 0c 1e 00 00 2f 2a |.0......|....../*|
|00000b40| 20 74 68 65 73 65 20 61 | 72 65 20 74 68 65 20 73 | these a|re the s|
|00000b50| 74 61 72 74 65 72 73 20 | 2a 2f 0d 0d 73 74 61 72 |tarters |*/..star|
|00000b60| 74 65 72 28 70 72 61 77 | 6e 5f 63 6f 63 6b 74 61 |ter(praw|n_cockta|
|00000b70| 69 6c 29 2e 0d 73 74 61 | 72 74 65 72 28 70 61 74 |il)..sta|rter(pat|
|00000b80| 65 5f 6d 61 69 73 6f 6e | 29 2e 0d 73 74 61 72 74 |e_maison|)..start|
|00000b90| 65 72 28 61 76 6f 63 61 | 64 6f 5f 76 69 6e 61 69 |er(avoca|do_vinai|
|00000ba0| 67 72 65 74 74 65 29 2e | 0d 73 74 61 72 74 65 72 |grette).|.starter|
|00000bb0| 28 73 74 75 66 66 65 64 | 5f 6d 75 73 68 72 6f 6f |(stuffed|_mushroo|
|00000bc0| 6d 73 29 2e 0d 73 74 61 | 72 74 65 72 28 70 61 72 |ms)..sta|rter(par|
|00000bd0| 6d 61 5f 68 61 6d 5f 77 | 69 74 68 5f 6d 65 6c 6f |ma_ham_w|ith_melo|
|00000be0| 6e 29 2e 0d 73 74 61 72 | 74 65 72 28 61 73 70 61 |n)..star|ter(aspa|
|00000bf0| 72 61 67 75 73 5f 73 6f | 75 70 29 2e 0d 0d 2f 2a |ragus_so|up).../*|
|00000c00| 20 61 6e 64 20 68 65 72 | 65 20 61 72 65 20 74 68 | and her|e are th|
|00000c10| 65 20 6d 61 69 6e 20 63 | 6f 75 72 73 65 73 20 28 |e main c|ourses (|
|00000c20| 76 65 67 65 74 61 62 6c | 65 73 20 61 72 65 20 69 |vegetabl|es are i|
|00000c30| 6e 63 6c 75 64 65 64 21 | 29 20 2a 2f 0d 0d 6d 61 |ncluded!|) */..ma|
|00000c40| 69 6e 28 64 6f 76 65 72 | 5f 73 6f 6c 65 29 2e 0d |in(dover|_sole)..|
|00000c50| 6d 61 69 6e 28 66 69 6c | 6c 65 74 5f 73 74 65 61 |main(fil|let_stea|
|00000c60| 6b 29 2e 0d 6d 61 69 6e | 28 63 61 6c 76 65 73 5f |k)..main|(calves_|
|00000c70| 6c 69 76 65 72 29 2e 0d | 6d 61 69 6e 28 63 68 69 |liver)..|main(chi|
|00000c80| 63 6b 65 6e 5f 6b 69 65 | 76 29 2e 0d 6d 61 69 6e |cken_kie|v)..main|
|00000c90| 28 72 61 67 6f 75 74 5f | 6f 66 5f 6c 61 6d 62 29 |(ragout_|of_lamb)|
|00000ca0| 2e 0d 6d 61 69 6e 28 70 | 6f 61 63 68 65 64 5f 73 |..main(p|oached_s|
|00000cb0| 61 6c 6d 6f 6e 29 2e 0d | 0d 2f 2a 20 74 68 65 20 |almon)..|./* the |
|00000cc0| 64 65 73 73 65 72 74 73 | 20 66 6f 6c 6c 6f 77 20 |desserts| follow |
|00000cd0| 68 65 72 65 20 2a 2f 0d | 0d 64 65 73 73 65 72 74 |here */.|.dessert|
|00000ce0| 28 63 68 6f 63 6f 6c 61 | 74 65 5f 66 75 64 67 65 |(chocola|te_fudge|
|00000cf0| 5f 63 61 6b 65 29 2e 0d | 64 65 73 73 65 72 74 28 |_cake)..|dessert(|
|00000d00| 76 61 6e 69 6c 6c 61 5f | 69 63 65 5f 63 72 65 61 |vanilla_|ice_crea|
|00000d10| 6d 29 2e 0d 64 65 73 73 | 65 72 74 28 70 65 61 63 |m)..dess|ert(peac|
|00000d20| 68 5f 6d 65 6c 62 61 29 | 2e 0d 64 65 73 73 65 72 |h_melba)|..desser|
|00000d30| 74 28 77 61 66 66 6c 65 | 73 5f 77 69 74 68 5f 6d |t(waffle|s_with_m|
|00000d40| 61 70 6c 65 5f 73 79 72 | 75 70 29 2e 0d 64 65 73 |aple_syr|up)..des|
|00000d50| 73 65 72 74 28 66 72 65 | 73 68 5f 66 72 75 69 74 |sert(fre|sh_fruit|
|00000d60| 5f 73 61 6c 61 64 29 2e | 0d 64 65 73 73 65 72 74 |_salad).|.dessert|
|00000d70| 28 61 70 70 6c 65 5f 61 | 6e 64 5f 62 6c 61 63 6b |(apple_a|nd_black|
|00000d80| 62 65 72 72 79 5f 70 69 | 65 29 2e 0d 0d 2f 2a 20 |berry_pi|e).../* |
|00000d90| 61 6e 64 20 74 68 65 73 | 65 20 61 72 65 20 74 68 |and thes|e are th|
|00000da0| 65 20 77 69 6e 65 73 20 | 2a 2f 0d 0d 77 69 6e 65 |e wines |*/..wine|
|00000db0| 28 63 68 61 62 6c 69 73 | 29 2e 0d 77 69 6e 65 28 |(chablis|)..wine(|
|00000dc0| 6d 75 73 63 61 64 65 74 | 5f 73 75 72 5f 6c 69 65 |muscadet|_sur_lie|
|00000dd0| 29 2e 0d 77 69 6e 65 28 | 62 65 61 75 6a 6f 6c 61 |)..wine(|beaujola|
|00000de0| 69 73 5f 6e 6f 75 76 65 | 61 75 29 2e 0d 77 69 6e |is_nouve|au)..win|
|00000df0| 65 28 6e 75 69 74 73 5f | 73 61 69 6e 74 5f 67 65 |e(nuits_|saint_ge|
|00000e00| 6f 72 67 65 29 2e 0d 77 | 69 6e 65 28 67 65 77 75 |orge)..w|ine(gewu|
|00000e10| 72 7a 74 72 61 6d 69 6e | 65 72 29 2e 0d 77 69 6e |rztramin|er)..win|
|00000e20| 65 28 63 61 62 65 72 6e | 65 74 5f 73 68 69 72 61 |e(cabern|et_shira|
|00000e30| 7a 29 2e 0d 0d 2f 2a 20 | 74 68 65 20 76 61 72 69 |z).../* |the vari|
|00000e40| 6f 75 73 20 6d 65 61 6c | 20 69 74 65 6d 27 73 20 |ous meal| item's |
|00000e50| 70 72 69 63 65 73 20 28 | 62 65 66 6f 72 65 20 73 |prices (|before s|
|00000e60| 65 72 76 69 63 65 20 61 | 6e 64 20 76 61 74 29 20 |ervice a|nd vat) |
|00000e70| 61 72 65 20 6c 69 73 74 | 65 64 20 68 65 72 65 20 |are list|ed here |
|00000e80| 2a 2f 0d 0d 70 72 69 63 | 65 28 63 68 61 62 6c 69 |*/..pric|e(chabli|
|00000e90| 73 2c 31 30 2e 39 35 29 | 2e 0d 70 72 69 63 65 28 |s,10.95)|..price(|
|00000ea0| 6d 75 73 63 61 64 65 74 | 5f 73 75 72 5f 6c 69 65 |muscadet|_sur_lie|
|00000eb0| 2c 35 2e 34 35 29 2e 0d | 70 72 69 63 65 28 62 65 |,5.45)..|price(be|
|00000ec0| 61 75 6a 6f 6c 61 69 73 | 5f 6e 6f 75 76 65 61 75 |aujolais|_nouveau|
|00000ed0| 2c 34 2e 37 35 29 2e 0d | 70 72 69 63 65 28 6e 75 |,4.75)..|price(nu|
|00000ee0| 69 74 73 5f 73 61 69 6e | 74 5f 67 65 6f 72 67 65 |its_sain|t_george|
|00000ef0| 2c 31 32 2e 37 35 29 2e | 0d 70 72 69 63 65 28 67 |,12.75).|.price(g|
|00000f00| 65 77 75 72 7a 74 72 61 | 6d 69 6e 65 72 2c 39 2e |ewurztra|miner,9.|
|00000f10| 32 35 29 2e 0d 70 72 69 | 63 65 28 63 61 62 65 72 |25)..pri|ce(caber|
|00000f20| 6e 65 74 5f 73 68 69 72 | 61 7a 2c 38 2e 36 35 29 |net_shir|az,8.65)|
|00000f30| 2e 0d 70 72 69 63 65 28 | 63 68 6f 63 6f 6c 61 74 |..price(|chocolat|
|00000f40| 65 5f 66 75 64 67 65 5f | 63 61 6b 65 2c 31 2e 37 |e_fudge_|cake,1.7|
|00000f50| 35 29 2e 0d 70 72 69 63 | 65 28 76 61 6e 69 6c 6c |5)..pric|e(vanill|
|00000f60| 61 5f 69 63 65 5f 63 72 | 65 61 6d 2c 30 2e 39 35 |a_ice_cr|eam,0.95|
|00000f70| 29 2e 0d 70 72 69 63 65 | 28 70 65 61 63 68 5f 6d |)..price|(peach_m|
|00000f80| 65 6c 62 61 2c 31 2e 35 | 35 29 2e 0d 70 72 69 63 |elba,1.5|5)..pric|
|00000f90| 65 28 77 61 66 66 6c 65 | 73 5f 77 69 74 68 5f 6d |e(waffle|s_with_m|
|00000fa0| 61 70 6c 65 5f 73 79 72 | 75 70 2c 31 2e 33 35 29 |aple_syr|up,1.35)|
|00000fb0| 2e 0d 70 72 69 63 65 28 | 66 72 65 73 68 5f 66 72 |..price(|fresh_fr|
|00000fc0| 75 69 74 5f 73 61 6c 61 | 64 2c 31 2e 39 35 29 2e |uit_sala|d,1.95).|
|00000fd0| 0d 70 72 69 63 65 28 61 | 70 70 6c 65 5f 61 6e 64 |.price(a|pple_and|
|00000fe0| 5f 62 6c 61 63 6b 62 65 | 72 72 79 5f 70 69 65 2c |_blackbe|rry_pie,|
|00000ff0| 31 2e 37 35 29 2e 0d 70 | 72 69 63 65 28 64 6f 76 |1.75)..p|rice(dov|
|00001000| 65 72 5f 73 6f 6c 65 2c | 38 2e 37 35 29 2e 0d 70 |er_sole,|8.75)..p|
|00001010| 72 69 63 65 28 66 69 6c | 6c 65 74 5f 73 74 65 61 |rice(fil|let_stea|
|00001020| 6b 2c 36 2e 35 29 2e 0d | 70 72 69 63 65 28 63 61 |k,6.5)..|price(ca|
|00001030| 6c 76 65 73 5f 6c 69 76 | 65 72 2c 34 2e 39 35 29 |lves_liv|er,4.95)|
|00001040| 2e 0d 70 72 69 63 65 28 | 63 68 69 63 6b 65 6e 5f |..price(|chicken_|
|00001050| 6b 69 65 76 2c 33 2e 36 | 35 29 2e 0d 70 72 69 63 |kiev,3.6|5)..pric|
|00001060| 65 28 72 61 67 6f 75 74 | 5f 6f 66 5f 6c 61 6d 62 |e(ragout|_of_lamb|
|00001070| 2c 35 2e 32 35 29 2e 0d | 70 72 69 63 65 28 70 6f |,5.25)..|price(po|
|00001080| 61 63 68 65 64 5f 73 61 | 6c 6d 6f 6e 2c 37 2e 32 |ached_sa|lmon,7.2|
|00001090| 35 29 2e 0d 70 72 69 63 | 65 28 70 72 61 77 6e 5f |5)..pric|e(prawn_|
|000010a0| 63 6f 63 6b 74 61 69 6c | 2c 32 2e 32 35 29 2e 0d |cocktail|,2.25)..|
|000010b0| 70 72 69 63 65 28 70 61 | 74 65 5f 6d 61 69 73 6f |price(pa|te_maiso|
|000010c0| 6e 2c 31 2e 34 35 29 2e | 0d 70 72 69 63 65 28 61 |n,1.45).|.price(a|
|000010d0| 76 6f 63 61 64 6f 5f 76 | 69 6e 61 69 67 72 65 74 |vocado_v|inaigret|
|000010e0| 74 65 2c 31 2e 35 35 29 | 2e 0d 70 72 69 63 65 28 |te,1.55)|..price(|
|000010f0| 73 74 75 66 66 65 64 5f | 6d 75 73 68 72 6f 6f 6d |stuffed_|mushroom|
|00001100| 73 2c 31 2e 31 35 29 2e | 0d 70 72 69 63 65 28 70 |s,1.15).|.price(p|
|00001110| 61 72 6d 61 5f 68 61 6d | 5f 77 69 74 68 5f 6d 65 |arma_ham|_with_me|
|00001120| 6c 6f 6e 2c 32 2e 37 35 | 29 2e 0d 70 72 69 63 65 |lon,2.75|)..price|
|00001130| 28 61 73 70 61 72 61 67 | 75 73 5f 73 6f 75 70 2c |(asparag|us_soup,|
|00001140| 31 2e 39 35 29 2e 0d 0d | 2f 2a 20 74 68 65 20 65 |1.95)...|/* the e|
|00001150| 6e 65 72 67 79 20 63 6f | 6e 74 65 6e 74 20 6f 66 |nergy co|ntent of|
|00001160| 20 65 61 63 68 20 6d 65 | 61 6c 20 69 74 65 6d 20 | each me|al item |
|00001170| 69 73 20 6c 69 73 74 65 | 64 20 68 65 72 65 20 69 |is liste|d here i|
|00001180| 6e 20 6b 69 6c 6f 63 61 | 6c 6f 72 69 65 73 20 2a |n kiloca|lories *|
|00001190| 2f 0d 0d 63 61 6c 6f 72 | 69 65 73 28 63 68 61 62 |/..calor|ies(chab|
|000011a0| 6c 69 73 2c 31 32 35 29 | 2e 0d 63 61 6c 6f 72 69 |lis,125)|..calori|
|000011b0| 65 73 28 6d 75 73 63 61 | 64 65 74 5f 73 75 72 5f |es(musca|det_sur_|
|000011c0| 6c 69 65 2c 31 30 30 29 | 2e 0d 63 61 6c 6f 72 69 |lie,100)|..calori|
|000011d0| 65 73 28 62 65 61 75 6a | 6f 6c 61 69 73 5f 6e 6f |es(beauj|olais_no|
|000011e0| 75 76 65 61 75 2c 31 35 | 30 29 2e 0d 63 61 6c 6f |uveau,15|0)..calo|
|000011f0| 72 69 65 73 28 6e 75 69 | 74 73 5f 73 61 69 6e 74 |ries(nui|ts_saint|
|00001200| 5f 67 65 6f 72 67 65 2c | 32 32 35 29 2e 0d 63 61 |_george,|225)..ca|
|00001210| 6c 6f 72 69 65 73 28 67 | 65 77 75 72 7a 74 72 61 |lories(g|ewurztra|
|00001220| 6d 69 6e 65 72 2c 31 32 | 35 29 2e 0d 63 61 6c 6f |miner,12|5)..calo|
|00001230| 72 69 65 73 28 63 61 62 | 65 72 6e 65 74 5f 73 68 |ries(cab|ernet_sh|
|00001240| 69 72 61 7a 2c 32 30 30 | 29 2e 0d 63 61 6c 6f 72 |iraz,200|)..calor|
|00001250| 69 65 73 28 63 68 6f 63 | 6f 6c 61 74 65 5f 66 75 |ies(choc|olate_fu|
|00001260| 64 67 65 5f 63 61 6b 65 | 2c 34 35 30 29 2e 0d 63 |dge_cake|,450)..c|
|00001270| 61 6c 6f 72 69 65 73 28 | 76 61 6e 69 6c 6c 61 5f |alories(|vanilla_|
|00001280| 69 63 65 5f 63 72 65 61 | 6d 2c 33 32 35 29 2e 0d |ice_crea|m,325)..|
|00001290| 63 61 6c 6f 72 69 65 73 | 28 70 65 61 63 68 5f 6d |calories|(peach_m|
|000012a0| 65 6c 62 61 2c 33 37 35 | 29 2e 0d 63 61 6c 6f 72 |elba,375|)..calor|
|000012b0| 69 65 73 28 77 61 66 66 | 6c 65 73 5f 77 69 74 68 |ies(waff|les_with|
|000012c0| 5f 6d 61 70 6c 65 5f 73 | 79 72 75 70 2c 34 32 35 |_maple_s|yrup,425|
|000012d0| 29 2e 0d 63 61 6c 6f 72 | 69 65 73 28 66 72 65 73 |)..calor|ies(fres|
|000012e0| 68 5f 66 72 75 69 74 5f | 73 61 6c 61 64 2c 31 37 |h_fruit_|salad,17|
|000012f0| 35 29 2e 0d 63 61 6c 6f | 72 69 65 73 28 61 70 70 |5)..calo|ries(app|
|00001300| 6c 65 5f 61 6e 64 5f 62 | 6c 61 63 6b 62 65 72 72 |le_and_b|lackberr|
|00001310| 79 5f 70 69 65 2c 32 35 | 30 29 2e 0d 63 61 6c 6f |y_pie,25|0)..calo|
|00001320| 72 69 65 73 28 64 6f 76 | 65 72 5f 73 6f 6c 65 2c |ries(dov|er_sole,|
|00001330| 32 35 30 29 2e 0d 63 61 | 6c 6f 72 69 65 73 28 66 |250)..ca|lories(f|
|00001340| 69 6c 6c 65 74 5f 73 74 | 65 61 6b 2c 36 35 30 29 |illet_st|eak,650)|
|00001350| 2e 0d 63 61 6c 6f 72 69 | 65 73 28 63 61 6c 76 65 |..calori|es(calve|
|00001360| 73 5f 6c 69 76 65 72 2c | 34 32 35 29 2e 0d 63 61 |s_liver,|425)..ca|
|00001370| 6c 6f 72 69 65 73 28 63 | 68 69 63 6b 65 6e 5f 6b |lories(c|hicken_k|
|00001380| 69 65 76 2c 34 35 30 29 | 2e 0d 63 61 6c 6f 72 69 |iev,450)|..calori|
|00001390| 65 73 28 72 61 67 6f 75 | 74 5f 6f 66 5f 6c 61 6d |es(ragou|t_of_lam|
|000013a0| 62 2c 35 30 30 29 2e 0d | 63 61 6c 6f 72 69 65 73 |b,500)..|calories|
|000013b0| 28 70 6f 61 63 68 65 64 | 5f 73 61 6c 6d 6f 6e 2c |(poached|_salmon,|
|000013c0| 32 32 35 29 2e 0d 63 61 | 6c 6f 72 69 65 73 28 70 |225)..ca|lories(p|
|000013d0| 72 61 77 6e 5f 63 6f 63 | 6b 74 61 69 6c 2c 31 37 |rawn_coc|ktail,17|
|000013e0| 35 29 2e 0d 63 61 6c 6f | 72 69 65 73 28 70 61 74 |5)..calo|ries(pat|
|000013f0| 65 5f 6d 61 69 73 6f 6e | 2c 31 35 30 29 2e 0d 63 |e_maison|,150)..c|
|00001400| 61 6c 6f 72 69 65 73 28 | 61 76 6f 63 61 64 6f 5f |alories(|avocado_|
|00001410| 76 69 6e 61 69 67 72 65 | 74 74 65 2c 32 37 35 29 |vinaigre|tte,275)|
|00001420| 2e 0d 63 61 6c 6f 72 69 | 65 73 28 73 74 75 66 66 |..calori|es(stuff|
|00001430| 65 64 5f 6d 75 73 68 72 | 6f 6f 6d 73 2c 32 30 30 |ed_mushr|ooms,200|
|00001440| 29 2e 0d 63 61 6c 6f 72 | 69 65 73 28 70 61 72 6d |)..calor|ies(parm|
|00001450| 61 5f 68 61 6d 5f 77 69 | 74 68 5f 6d 65 6c 6f 6e |a_ham_wi|th_melon|
|00001460| 2c 31 30 30 29 2e 0d 63 | 61 6c 6f 72 69 65 73 28 |,100)..c|alories(|
|00001470| 61 73 70 61 72 61 67 75 | 73 5f 73 6f 75 70 2c 31 |asparagu|s_soup,1|
|00001480| 32 35 29 2e 0d 0d 2f 2a | 20 68 65 72 65 20 69 73 |25).../*| here is|
|00001490| 20 61 20 6c 69 73 74 20 | 6f 66 20 74 68 65 20 63 | a list |of the c|
|000014a0| 6f 6c 6f 75 72 73 20 6f | 66 20 74 68 65 20 76 61 |olours o|f the va|
|000014b0| 72 69 6f 75 73 20 77 69 | 6e 65 73 20 2a 2f 0d 0d |rious wi|nes */..|
|000014c0| 63 6f 6c 6f 75 72 28 62 | 65 61 75 6a 6f 6c 61 69 |colour(b|eaujolai|
|000014d0| 73 5f 6e 6f 75 76 65 61 | 75 2c 72 65 64 29 2e 0d |s_nouvea|u,red)..|
|000014e0| 63 6f 6c 6f 75 72 28 6e | 75 69 74 73 5f 73 61 69 |colour(n|uits_sai|
|000014f0| 6e 74 5f 67 65 6f 72 67 | 65 2c 72 65 64 29 2e 0d |nt_georg|e,red)..|
|00001500| 63 6f 6c 6f 75 72 28 63 | 61 62 65 72 6e 65 74 5f |colour(c|abernet_|
|00001510| 73 68 69 72 61 7a 2c 72 | 65 64 29 2e 0d 63 6f 6c |shiraz,r|ed)..col|
|00001520| 6f 75 72 28 63 68 61 62 | 6c 69 73 2c 77 68 69 74 |our(chab|lis,whit|
|00001530| 65 29 2e 0d 63 6f 6c 6f | 75 72 28 6d 75 73 63 61 |e)..colo|ur(musca|
|00001540| 64 65 74 5f 73 75 72 5f | 6c 69 65 2c 77 68 69 74 |det_sur_|lie,whit|
|00001550| 65 29 2e 0d 63 6f 6c 6f | 75 72 28 67 65 77 75 72 |e)..colo|ur(gewur|
|00001560| 7a 74 72 61 6d 69 6e 65 | 72 2c 77 68 69 74 65 29 |ztramine|r,white)|
|00001570| 2e 0d 0d 2f 2a 20 74 68 | 69 73 20 63 6c 61 73 73 |.../* th|is class|
|00001580| 69 66 69 65 73 20 74 68 | 65 20 6d 61 69 6e 20 74 |ifies th|e main t|
|00001590| 79 70 65 20 6f 66 20 69 | 6e 67 72 65 64 69 65 6e |ype of i|ngredien|
|000015a0| 74 73 20 69 6e 20 65 61 | 63 68 20 73 74 61 72 74 |ts in ea|ch start|
|000015b0| 65 72 20 61 6e 64 20 6d | 61 69 6e 20 64 69 73 68 |er and m|ain dish|
|000015c0| 20 2a 2f 0d 0d 64 69 73 | 68 5f 74 79 70 65 28 70 | */..dis|h_type(p|
|000015d0| 61 74 65 5f 6d 61 69 73 | 6f 6e 2c 70 6f 75 6c 74 |ate_mais|on,poult|
|000015e0| 72 79 29 2e 0d 64 69 73 | 68 5f 74 79 70 65 28 63 |ry)..dis|h_type(c|
|000015f0| 68 69 63 6b 65 6e 5f 6b | 69 65 76 2c 70 6f 75 6c |hicken_k|iev,poul|
|00001600| 74 72 79 29 2e 0d 64 69 | 73 68 5f 74 79 70 65 28 |try)..di|sh_type(|
|00001610| 61 76 6f 63 61 64 6f 5f | 76 69 6e 61 69 67 72 65 |avocado_|vinaigre|
|00001620| 74 74 65 2c 76 65 67 65 | 74 61 62 6c 65 29 2e 0d |tte,vege|table)..|
|00001630| 64 69 73 68 5f 74 79 70 | 65 28 73 74 75 66 66 65 |dish_typ|e(stuffe|
|00001640| 64 5f 6d 75 73 68 72 6f | 6f 6d 73 2c 76 65 67 65 |d_mushro|oms,vege|
|00001650| 74 61 62 6c 65 29 2e 0d | 64 69 73 68 5f 74 79 70 |table)..|dish_typ|
|00001660| 65 28 61 73 70 61 72 61 | 67 75 73 5f 73 6f 75 70 |e(aspara|gus_soup|
|00001670| 2c 76 65 67 65 74 61 62 | 6c 65 29 2e 0d 64 69 73 |,vegetab|le)..dis|
|00001680| 68 5f 74 79 70 65 28 70 | 61 72 6d 61 5f 68 61 6d |h_type(p|arma_ham|
|00001690| 5f 77 69 74 68 5f 6d 65 | 6c 6f 6e 2c 6d 65 61 74 |_with_me|lon,meat|
|000016a0| 29 2e 0d 64 69 73 68 5f | 74 79 70 65 28 66 69 6c |)..dish_|type(fil|
|000016b0| 6c 65 74 5f 73 74 65 61 | 6b 2c 6d 65 61 74 29 2e |let_stea|k,meat).|
|000016c0| 0d 64 69 73 68 5f 74 79 | 70 65 28 63 61 6c 76 65 |.dish_ty|pe(calve|
|000016d0| 73 5f 6c 69 76 65 72 2c | 6d 65 61 74 29 2e 0d 64 |s_liver,|meat)..d|
|000016e0| 69 73 68 5f 74 79 70 65 | 28 72 61 67 6f 75 74 5f |ish_type|(ragout_|
|000016f0| 6f 66 5f 6c 61 6d 62 2c | 6d 65 61 74 29 2e 0d 64 |of_lamb,|meat)..d|
|00001700| 69 73 68 5f 74 79 70 65 | 28 70 72 61 77 6e 5f 63 |ish_type|(prawn_c|
|00001710| 6f 63 6b 74 61 69 6c 2c | 66 69 73 68 29 2e 0d 64 |ocktail,|fish)..d|
|00001720| 69 73 68 5f 74 79 70 65 | 28 64 6f 76 65 72 5f 73 |ish_type|(dover_s|
|00001730| 6f 6c 65 2c 66 69 73 68 | 29 2e 0d 64 69 73 68 5f |ole,fish|)..dish_|
|00001740| 74 79 70 65 28 70 6f 61 | 63 68 65 64 5f 73 61 6c |type(poa|ched_sal|
|00001750| 6d 6f 6e 2c 66 69 73 68 | 29 2e 0d 0d 0b 3c 45 44 |mon,fish|)....<ED|
|00001760| 49 4e 42 55 52 47 48 3e | 00 00 00 00 0b 3c 49 4e |INBURGH>|.....<IN|
|00001770| 54 45 52 50 52 45 54 3e | 00 00 00 00 00 00 00 00 |TERPRET>|........|
|00001780| 00 00 00 00 00 00 00 00 | 00 00 00 00 03 88 a1 00 |........|........|
|00001790| 0d 96 6a 2b 00 00 00 21 | 00 00 00 1e 00 00 00 00 |..j+...!|........|
|000017a0| 00 00 00 00 0c 6d 65 6e | 75 20 64 69 73 70 6c 61 |.....men|u displa|
|000017b0| 79 00 00 05 be 12 00 05 | 00 00 24 de 00 00 00 00 |y.......|..$.....|
|000017c0| 00 00 20 0b 00 63 67 86 | 00 05 bf 76 00 09 95 88 |.. ..cg.|...v....|
|000017d0| 00 54 7e 28 00 01 14 62 | 00 63 67 86 00 63 68 16 |.T~(...b|.cg..ch.|
|000017e0| 40 80 95 6c 40 80 aa ec | 00 00 00 00 00 00 0d 3a |@..l@...|.......:|
|000017f0| 00 4c 27 30 00 00 18 00 | 00 00 00 00 00 00 17 a4 |.L'0....|........|
|00001800| 00 00 00 01 00 63 67 fe | 00 0e b9 38 00 00 b1 d0 |.....cg.|...8....|
|00001810| 00 4c 27 30 00 63 68 30 | 00 dd 52 00 00 05 00 04 |.L'0.ch0|..R.....|
|00001820| 00 05 c0 54 4e f9 00 12 | 00 30 82 e0 00 63 70 50 |...TN...|.0...cpP|
|00001830| 00 30 e4 42 00 00 00 03 | 00 63 67 ee 00 2f 83 00 |.0.B....|.cg../..|
|00001840| 00 63 68 30 00 63 75 64 | 00 3b 52 d4 00 05 bf 32 |.ch0.cud|.;R....2|
|00001850| 00 05 bf 42 00 01 14 62 | 00 63 67 fe 00 63 67 fe |...B...b|.cg..cg.|
|00001860| 00 00 00 01 00 30 e4 28 | 00 29 6c 4e 00 30 e4 34 |.....0.(|.)lN.0.4|
|00001870| 00 61 d8 be 00 00 00 00 | 00 05 a0 03 40 80 a5 aa |.a......|....@...|
|00001880| 00 00 00 00 00 00 70 56 | 00 30 e4 22 0d 3a 6a 92 |......pV|.0.".:j.|
|00001890| 00 00 01 01 00 4c 27 30 | 00 00 00 01 00 00 00 01 |.....L'0|........|
|000018a0| 00 00 00 00 00 33 00 36 | 01 b7 02 46 00 00 00 0a |.....3.6|...F....|
|000018b0| 00 09 00 04 00 30 00 01 | 00 00 00 00 00 00 08 fb |.....0..|........|
|000018c0| 00 00 2f 2a 20 43 72 65 | 61 74 65 20 61 20 77 69 |../* Cre|ate a wi|
|000018d0| 6e 64 6f 77 20 66 6f 72 | 20 74 68 65 20 64 69 73 |ndow for| the dis|
|000018e0| 70 6c 61 79 20 6f 66 20 | 74 68 65 20 6d 65 61 6c |play of |the meal|
|000018f0| 20 6d 65 6e 75 20 0d 52 | 65 77 72 69 74 74 65 6e | menu .R|ewritten|
|00001900| 20 74 6f 20 75 73 65 20 | 61 20 43 6f 6e 74 72 6f | to use |a Contro|
|00001910| 6c 20 57 69 6e 64 6f 77 | 20 2d 20 4e 43 4a 20 44 |l Window| - NCJ D|
|00001920| 65 63 20 39 33 20 2a 2f | 0d 0d 0d 25 20 57 69 6e |ec 93 */|...% Win|
|00001930| 64 6f 77 20 61 6c 72 65 | 61 64 79 20 65 78 69 73 |dow alre|ady exis|
|00001940| 74 73 20 2d 20 75 70 64 | 61 74 65 20 74 68 65 20 |ts - upd|ate the |
|00001950| 66 69 65 6c 64 73 0d 25 | 0d 73 68 6f 77 5f 6d 65 |fields.%|.show_me|
|00001960| 6e 75 28 20 4d 57 2c 20 | 53 74 61 72 74 65 72 2c |nu( MW, |Starter,|
|00001970| 20 4d 61 69 6e 2c 20 44 | 65 73 73 65 72 74 2c 20 | Main, D|essert, |
|00001980| 57 69 6e 65 2c 20 43 6f | 73 74 2c 20 43 61 6c 6f |Wine, Co|st, Calo|
|00001990| 72 69 65 73 20 29 3a 2d | 0d 20 20 20 69 73 5f 77 |ries ):-|. is_w|
|000019a0| 69 6e 28 20 4d 57 2c 20 | 63 74 72 6c 20 29 2c 0d |in( MW, |ctrl ),.|
|000019b0| 20 20 20 21 2c 0d 20 20 | 20 77 66 72 6f 6e 74 28 | !,. | wfront(|
|000019c0| 20 4d 57 20 29 2c 0d 20 | 20 20 63 77 5f 73 65 74 | MW ),. | cw_set|
|000019d0| 5f 69 74 65 6d 28 20 4d | 57 2c 20 73 74 61 72 74 |_item( M|W, start|
|000019e0| 65 72 2c 20 53 74 61 72 | 74 65 72 20 29 2c 0d 20 |er, Star|ter ),. |
|000019f0| 20 20 63 77 5f 73 65 74 | 5f 69 74 65 6d 28 20 4d | cw_set|_item( M|
|00001a00| 57 2c 20 6d 61 69 6e 2c | 20 4d 61 69 6e 20 29 2c |W, main,| Main ),|
|00001a10| 0d 20 20 20 63 77 5f 73 | 65 74 5f 69 74 65 6d 28 |. cw_s|et_item(|
|00001a20| 20 4d 57 2c 20 64 65 73 | 73 65 72 74 2c 20 44 65 | MW, des|sert, De|
|00001a30| 73 73 65 72 74 20 29 2c | 0d 20 20 20 63 77 5f 73 |ssert ),|. cw_s|
|00001a40| 65 74 5f 69 74 65 6d 28 | 20 4d 57 2c 20 77 69 6e |et_item(| MW, win|
|00001a50| 65 2c 20 57 69 6e 65 20 | 29 2c 0d 20 20 20 63 77 |e, Wine |),. cw|
|00001a60| 5f 73 65 74 5f 69 74 65 | 6d 28 20 4d 57 2c 20 63 |_set_ite|m( MW, c|
|00001a70| 6f 73 74 2c 20 77 72 69 | 74 65 28 43 6f 73 74 29 |ost, wri|te(Cost)|
|00001a80| 20 29 2c 0d 20 20 20 63 | 77 5f 73 65 74 5f 69 74 | ),. c|w_set_it|
|00001a90| 65 6d 28 20 4d 57 2c 20 | 63 61 6c 73 2c 20 77 72 |em( MW, |cals, wr|
|00001aa0| 69 74 65 28 43 61 6c 6f | 72 69 65 73 29 20 29 2c |ite(Calo|ries) ),|
|00001ab0| 0d 20 20 20 63 77 5f 65 | 6e 61 62 6c 65 5f 69 74 |. cw_e|nable_it|
|00001ac0| 65 6d 28 20 4d 57 2c 20 | 6d 6f 72 65 42 74 6e 20 |em( MW, |moreBtn |
|00001ad0| 29 2c 0d 20 20 20 6d 65 | 61 6c 5f 68 61 6e 64 6c |),. me|al_handl|
|00001ae0| 65 72 28 20 4d 57 20 29 | 2e 0d 0d 25 20 43 72 65 |er( MW )|...% Cre|
|00001af0| 61 74 65 20 61 20 6e 65 | 77 20 77 69 6e 64 6f 77 |ate a ne|w window|
|00001b00| 20 66 6f 72 20 74 68 69 | 73 20 6d 65 61 6c 20 6d | for thi|s meal m|
|00001b10| 65 6e 75 0d 25 0d 73 68 | 6f 77 5f 6d 65 6e 75 28 |enu.%.sh|ow_menu(|
|00001b20| 20 4d 57 2c 20 53 74 61 | 72 74 65 72 2c 20 4d 61 | MW, Sta|rter, Ma|
|00001b30| 69 6e 2c 20 44 65 73 73 | 65 72 74 2c 20 57 69 6e |in, Dess|ert, Win|
|00001b40| 65 2c 20 43 6f 73 74 2c | 20 43 61 6c 6f 72 69 65 |e, Cost,| Calorie|
|00001b50| 73 20 29 3a 2d 0d 20 20 | 20 28 20 67 65 74 5f 70 |s ):-. | ( get_p|
|00001b60| 72 6f 70 28 20 6d 65 61 | 6c 2c 20 63 74 72 6c 77 |rop( mea|l, ctrlw|
|00001b70| 69 6e 2c 20 50 72 65 76 | 4d 57 20 29 20 2d 3e 20 |in, Prev|MW ) -> |
|00001b80| 77 6b 69 6c 6c 28 20 50 | 72 65 76 4d 57 20 29 20 |wkill( P|revMW ) |
|00001b90| 3b 20 74 72 75 65 20 29 | 2c 0d 20 20 20 63 77 5f |; true )|,. cw_|
|00001ba0| 63 72 65 61 74 65 28 20 | 4d 57 2c 20 35 30 2c 20 |create( |MW, 50, |
|00001bb0| 36 30 2c 32 32 30 2c 20 | 33 32 30 2c 20 5b 64 69 |60,220, |320, [di|
|00001bc0| 61 6c 6f 67 2c 20 76 69 | 73 69 62 6c 65 5d 20 29 |alog, vi|sible] )|
|00001bd0| 2c 0d 20 20 20 73 65 74 | 5f 70 72 6f 70 28 20 6d |,. set|_prop( m|
|00001be0| 65 61 6c 2c 20 63 74 72 | 6c 77 69 6e 2c 20 4d 57 |eal, ctr|lwin, MW|
|00001bf0| 20 29 2c 0d 09 20 20 63 | 77 5f 61 64 64 5f 69 74 | ),.. c|w_add_it|
|00001c00| 65 6d 28 20 4d 57 2c 20 | 6d 6f 72 65 42 74 6e 2c |em( MW, |moreBtn,|
|00001c10| 20 62 6f 6c 64 62 75 74 | 74 6f 6e 28 31 38 37 2c | boldbut|ton(187,|
|00001c20| 20 32 33 35 2c 20 32 36 | 2c 20 20 37 36 2c 20 27 | 235, 26|, 76, '|
|00001c30| 4d 6f 72 65 27 29 29 2c | 0d 09 20 20 63 77 5f 61 |More')),|.. cw_a|
|00001c40| 64 64 5f 69 74 65 6d 28 | 20 4d 57 2c 20 65 6e 64 |dd_item(| MW, end|
|00001c50| 42 74 6e 2c 20 09 62 75 | 74 74 6f 6e 28 31 39 30 |Btn, .bu|tton(190|
|00001c60| 2c 20 31 33 35 2c 20 32 | 30 2c 20 20 37 30 2c 20 |, 135, 2|0, 70, |
|00001c70| 27 46 69 6e 69 73 68 27 | 29 29 2c 0d 09 20 20 63 |'Finish'|)),.. c|
|00001c80| 77 5f 61 64 64 5f 69 74 | 65 6d 28 20 4d 57 2c 20 |w_add_it|em( MW, |
|00001c90| 5f 2c 20 09 74 65 78 74 | 28 20 31 30 2c 20 20 31 |_, .text|( 10, 1|
|00001ca0| 30 2c 20 32 30 2c 20 31 | 30 30 2c 20 27 53 74 61 |0, 20, 1|00, 'Sta|
|00001cb0| 72 74 65 72 3a 27 2c 20 | 27 43 6f 75 72 69 65 72 |rter:', |'Courier|
|00001cc0| 27 2c 31 32 2c 32 2c 62 | 6c 75 65 29 29 2c 0d 09 |',12,2,b|lue)),..|
|00001cd0| 20 20 63 77 5f 61 64 64 | 5f 69 74 65 6d 28 20 4d | cw_add|_item( M|
|00001ce0| 57 2c 20 73 74 61 72 74 | 65 72 2c 20 09 74 65 78 |W, start|er, .tex|
|00001cf0| 74 28 20 31 30 2c 20 31 | 32 30 2c 20 32 30 2c 09 |t( 10, 1|20, 20,.|
|00001d00| 32 32 30 2c 20 53 74 61 | 72 74 65 72 29 29 2c 0d |220, Sta|rter)),.|
|00001d10| 20 20 20 63 77 5f 61 64 | 64 5f 69 74 65 6d 28 20 | cw_ad|d_item( |
|00001d20| 4d 57 2c 20 5f 2c 20 09 | 09 74 65 78 74 28 20 34 |MW, _, .|.text( 4|
|00001d30| 30 2c 20 20 31 30 2c 20 | 32 30 2c 20 31 30 30 2c |0, 10, |20, 100,|
|00001d40| 20 27 4d 61 69 6e 20 63 | 6f 75 72 73 65 3a 27 2c | 'Main c|ourse:',|
|00001d50| 20 27 43 6f 75 72 69 65 | 72 27 2c 31 32 2c 32 2c | 'Courie|r',12,2,|
|00001d60| 62 6c 75 65 29 29 2c 0d | 09 09 09 63 77 5f 61 64 |blue)),.|...cw_ad|
|00001d70| 64 5f 69 74 65 6d 28 20 | 4d 57 2c 20 6d 61 69 6e |d_item( |MW, main|
|00001d80| 2c 20 09 09 74 65 78 74 | 28 20 34 30 2c 20 31 32 |, ..text|( 40, 12|
|00001d90| 30 2c 20 32 30 2c 09 32 | 32 30 2c 20 4d 61 69 6e |0, 20,.2|20, Main|
|00001da0| 29 29 2c 0d 09 09 09 63 | 77 5f 61 64 64 5f 69 74 |)),....c|w_add_it|
|00001db0| 65 6d 28 20 4d 57 2c 20 | 5f 2c 20 09 74 65 78 74 |em( MW, |_, .text|
|00001dc0| 28 20 37 30 2c 20 20 31 | 30 2c 20 32 30 2c 20 31 |( 70, 1|0, 20, 1|
|00001dd0| 30 30 2c 20 27 44 65 73 | 73 65 72 74 3a 27 2c 20 |00, 'Des|sert:', |
|00001de0| 27 43 6f 75 72 69 65 72 | 27 2c 31 32 2c 32 2c 62 |'Courier|',12,2,b|
|00001df0| 6c 75 65 29 29 2c 0d 09 | 09 09 63 77 5f 61 64 64 |lue)),..|..cw_add|
|00001e00| 5f 69 74 65 6d 28 20 4d | 57 2c 20 64 65 73 73 65 |_item( M|W, desse|
|00001e10| 72 74 2c 20 09 74 65 78 | 74 28 20 37 30 2c 20 31 |rt, .tex|t( 70, 1|
|00001e20| 32 30 2c 20 32 30 2c 09 | 32 32 30 2c 20 44 65 73 |20, 20,.|220, Des|
|00001e30| 73 65 72 74 29 29 2c 0d | 09 09 09 63 77 5f 61 64 |sert)),.|...cw_ad|
|00001e40| 64 5f 69 74 65 6d 28 20 | 4d 57 2c 20 5f 2c 20 09 |d_item( |MW, _, .|
|00001e50| 74 65 78 74 28 31 30 30 | 2c 20 20 31 30 2c 20 32 |text(100|, 10, 2|
|00001e60| 30 2c 20 31 30 30 2c 20 | 27 57 69 6e 65 3a 27 2c |0, 100, |'Wine:',|
|00001e70| 20 27 43 6f 75 72 69 65 | 72 27 2c 31 32 2c 32 2c | 'Courie|r',12,2,|
|00001e80| 62 6c 75 65 29 29 2c 0d | 09 09 09 63 77 5f 61 64 |blue)),.|...cw_ad|
|00001e90| 64 5f 69 74 65 6d 28 20 | 4d 57 2c 20 77 69 6e 65 |d_item( |MW, wine|
|00001ea0| 2c 20 09 74 65 78 74 28 | 31 30 30 2c 20 31 32 30 |, .text(|100, 120|
|00001eb0| 2c 20 32 30 2c 09 32 32 | 30 2c 20 57 69 6e 65 29 |, 20,.22|0, Wine)|
|00001ec0| 29 2c 0d 09 09 09 63 77 | 5f 61 64 64 5f 69 74 65 |),....cw|_add_ite|
|00001ed0| 6d 28 20 4d 57 2c 20 5f | 2c 20 09 74 65 78 74 28 |m( MW, _|, .text(|
|00001ee0| 31 33 30 2c 20 20 31 30 | 2c 20 32 30 2c 20 31 30 |130, 10|, 20, 10|
|00001ef0| 30 2c 20 27 43 61 6c 6f | 72 69 65 73 3a 27 2c 20 |0, 'Calo|ries:', |
|00001f00| 27 43 6f 75 72 69 65 72 | 27 2c 31 32 2c 32 2c 62 |'Courier|',12,2,b|
|00001f10| 6c 75 65 29 29 2c 0d 09 | 09 09 63 77 5f 61 64 64 |lue)),..|..cw_add|
|00001f20| 5f 69 74 65 6d 28 20 4d | 57 2c 20 63 61 6c 73 2c |_item( M|W, cals,|
|00001f30| 20 09 09 74 65 78 74 28 | 31 33 30 2c 20 31 32 30 | ..text(|130, 120|
|00001f40| 2c 20 32 30 2c 09 32 32 | 30 2c 20 77 72 69 74 65 |, 20,.22|0, write|
|00001f50| 28 43 61 6c 6f 72 69 65 | 73 29 29 29 2c 0d 09 09 |(Calorie|s))),...|
|00001f60| 09 63 77 5f 61 64 64 5f | 69 74 65 6d 28 20 4d 57 |.cw_add_|item( MW|
|00001f70| 2c 20 5f 2c 20 09 09 74 | 65 78 74 28 31 36 30 2c |, _, ..t|ext(160,|
|00001f80| 20 20 31 30 2c 20 32 30 | 2c 20 31 30 30 2c 20 27 | 10, 20|, 100, '|
|00001f90| 43 6f 73 74 3a 27 2c 20 | 27 43 6f 75 72 69 65 72 |Cost:', |'Courier|
|00001fa0| 27 2c 31 32 2c 32 2c 62 | 6c 75 65 29 29 2c 0d 09 |',12,2,b|lue)),..|
|00001fb0| 09 09 63 77 5f 61 64 64 | 5f 69 74 65 6d 28 20 4d |..cw_add|_item( M|
|00001fc0| 57 2c 20 63 6f 73 74 2c | 20 09 09 74 65 78 74 28 |W, cost,| ..text(|
|00001fd0| 31 36 30 2c 20 31 32 30 | 2c 20 32 30 2c 09 20 34 |160, 120|, 20,. 4|
|00001fe0| 30 2c 20 77 72 69 74 65 | 28 43 6f 73 74 29 29 29 |0, write|(Cost)))|
|00001ff0| 2c 0d 20 20 20 6d 65 61 | 6c 5f 68 61 6e 64 6c 65 |,. mea|l_handle|
|00002000| 72 28 20 4d 57 20 29 2e | 0d 0d 6d 65 61 6c 5f 68 |r( MW ).|..meal_h|
|00002010| 61 6e 64 6c 65 72 28 20 | 4d 57 20 29 3a 2d 0d 20 |andler( |MW ):-. |
|00002020| 20 20 20 61 77 61 69 74 | 5f 62 75 74 74 6f 6e 28 | await|_button(|
|00002030| 20 4d 57 2c 20 57 68 69 | 63 68 42 75 74 74 6f 6e | MW, Whi|chButton|
|00002040| 2c 20 63 6c 65 61 72 20 | 29 2c 20 20 20 25 20 57 |, clear |), % W|
|00002050| 61 69 74 20 66 6f 72 20 | 61 20 62 75 74 74 6f 6e |ait for |a button|
|00002060| 20 63 6c 69 63 6b 0d 20 | 20 20 20 57 68 69 63 68 | click. | Which|
|00002070| 42 75 74 74 6f 6e 20 3d | 3d 20 6d 6f 72 65 42 74 |Button =|= moreBt|
|00002080| 6e 2c 0d 20 20 20 20 21 | 2c 0d 20 20 20 20 66 61 |n,. !|,. fa|
|00002090| 69 6c 2e 20 20 20 25 20 | 46 61 69 6c 20 62 61 63 |il. % |Fail bac|
|000020a0| 6b 20 66 6f 72 20 6e 65 | 78 74 20 73 6f 6c 75 74 |k for ne|xt solut|
|000020b0| 69 6f 6e 0d 6d 65 61 6c | 5f 68 61 6e 64 6c 65 72 |ion.meal|_handler|
|000020c0| 28 20 4d 57 20 29 3a 2d | 20 20 20 25 20 54 68 65 |( MW ):-| % The|
|000020d0| 20 27 46 69 6e 69 73 68 | 27 20 62 75 74 74 6f 6e | 'Finish|' button|
|000020e0| 0d 20 20 20 20 64 65 6c | 5f 70 72 6f 70 28 20 6d |. del|_prop( m|
|000020f0| 65 61 6c 2c 20 63 74 72 | 6c 77 69 6e 20 29 2c 0d |eal, ctr|lwin ),.|
|00002100| 20 20 20 20 77 6b 69 6c | 6c 28 20 4d 57 20 29 2e | wkil|l( MW ).|
|00002110| 0d 0d 65 6e 64 5f 6f 66 | 5f 6d 65 61 6c 73 28 20 |..end_of|_meals( |
|00002120| 4d 57 20 29 3a 2d 0d 20 | 20 20 63 77 5f 64 69 73 |MW ):-. | cw_dis|
|00002130| 61 62 6c 65 5f 69 74 65 | 6d 28 20 4d 57 2c 20 6d |able_ite|m( MW, m|
|00002140| 6f 72 65 42 74 6e 20 29 | 2c 0d 20 20 20 61 77 61 |oreBtn )|,. awa|
|00002150| 69 74 5f 62 75 74 74 6f | 6e 28 20 4d 57 2c 20 5f |it_butto|n( MW, _|
|00002160| 2c 20 63 6c 65 61 72 20 | 29 2c 20 20 20 25 20 57 |, clear |), % W|
|00002170| 61 69 74 20 66 6f 72 20 | 27 46 69 6e 69 73 68 27 |ait for |'Finish'|
|00002180| 20 62 75 74 74 6f 6e 20 | 63 6c 69 63 6b 0d 20 20 | button |click. |
|00002190| 20 64 65 6c 5f 70 72 6f | 70 28 20 6d 65 61 6c 2c | del_pro|p( meal,|
|000021a0| 20 63 74 72 6c 77 69 6e | 20 29 2c 0d 20 20 20 77 | ctrlwin| ),. w|
|000021b0| 6b 69 6c 6c 28 20 4d 57 | 20 29 2e 0d 0d 0b 3c 45 |kill( MW| )....<E|
|000021c0| 44 49 4e 42 55 52 47 48 | 3e 00 00 00 00 0b 3c 49 |DINBURGH|>.....<I|
|000021d0| 4e 54 45 52 50 52 45 54 | 3e 00 00 00 00 00 00 00 |NTERPRET|>.......|
|000021e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 03 8f 55 |........|.......U|
|000021f0| 40 0d 96 6c 46 00 00 00 | cd 00 00 00 1e 00 00 00 |@..lF...|........|
|00002200| 00 00 00 00 00 07 73 74 | 61 72 74 65 72 73 70 6c |......st|arterspl|
|00002210| 61 79 00 00 05 be 12 00 | 05 00 00 24 de 00 00 00 |ay......|...$....|
|00002220| 00 00 00 20 0b 00 63 67 | 86 00 05 bf 76 00 09 95 |... ..cg|....v...|
|00002230| 88 00 54 7e 28 00 01 14 | 62 00 63 67 86 00 63 68 |..T~(...|b.cg..ch|
|00002240| 16 40 80 95 6c 40 80 aa | ec 00 00 00 00 00 00 0d |.@..l@..|........|
|00002250| 3a 00 4c 13 98 00 00 24 | 00 00 00 00 00 00 00 22 |:.L....$|......."|
|00002260| 05 00 00 00 01 00 63 67 | fe 00 0e b9 38 00 00 b1 |......cg|....8...|
|00002270| d0 00 4c 27 30 00 63 68 | 30 00 dd 4c 00 00 05 00 |..L'0.ch|0..L....|
|00002280| 04 00 05 c0 54 4e f9 00 | 12 00 30 82 e0 00 63 70 |....TN..|..0...cp|
|00002290| 50 00 30 e4 42 00 00 00 | 03 00 63 67 ee 00 2f 83 |P.0.B...|..cg../.|
|000022a0| 00 00 63 68 30 00 63 75 | 64 00 3b 52 d4 00 05 bf |..ch0.cu|d.;R....|
|000022b0| 32 00 05 bf 42 00 01 14 | 62 00 63 67 fe 00 63 67 |2...B...|b.cg..cg|
|000022c0| fe 00 00 00 01 00 30 e4 | 28 00 29 72 8a 00 30 e4 |......0.|(.)r..0.|
|000022d0| 34 00 61 d8 be 00 00 00 | 00 00 05 a0 03 40 80 a5 |4.a.....|.....@..|
|000022e0| aa 00 00 00 00 00 00 70 | 56 00 30 e4 22 0d 3a 70 |.......p|V.0.".:p|
|000022f0| ce 00 00 01 01 00 4c 27 | 30 00 00 00 01 00 00 00 |......L'|0.......|
|00002300| 01 00 00 00 00 00 2c 00 | 0f 01 3c 01 fa 00 00 00 |......,.|..<.....|
|00002310| 0a 00 09 00 04 00 30 00 | 01 00 00 00 00 00 00 06 |......0.|........|
|00002320| ea 00 ff 2f 2a 0d 0d 4d | 65 61 6c 20 53 65 6c 65 |.../*..M|eal Sele|
|00002330| 63 74 69 6f 6e 20 45 78 | 61 6d 70 6c 65 20 2d 20 |ction Ex|ample - |
|00002340| 77 72 69 74 74 65 6e 20 | 62 79 20 42 72 69 61 6e |written |by Brian|
|00002350| 20 44 20 53 74 65 65 6c | 2c 20 4a 61 6e 20 31 39 | D Steel|, Jan 19|
|00002360| 38 38 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |88.-----|--------|
|00002370| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002390| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 0d |--------|------..|
|000023a0| 41 64 61 70 74 65 64 20 | 66 6f 72 20 4d 61 63 50 |Adapted |for MacP|
|000023b0| 72 6f 6c 6f 67 33 32 20 | 62 79 20 4e 69 63 6b 79 |rolog32 |by Nicky|
|000023c0| 20 4a 6f 68 6e 73 2c 20 | 44 65 63 20 31 39 39 33 | Johns, |Dec 1993|
|000023d0| 0d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|000023e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000023f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 0d 54 68 |--------|----..Th|
|00002410| 69 73 20 70 72 6f 67 72 | 61 6d 20 69 73 20 64 65 |is progr|am is de|
|00002420| 73 69 67 6e 65 64 20 74 | 6f 20 68 65 6c 70 20 79 |signed t|o help y|
|00002430| 6f 75 20 73 65 6c 65 63 | 74 20 6d 65 61 6c 73 20 |ou selec|t meals |
|00002440| 6f 66 20 76 61 72 69 6f | 75 73 20 73 6f 72 74 73 |of vario|us sorts|
|00002450| 20 66 72 6f 6d 0d 61 20 | 64 61 74 61 62 61 73 65 | from.a |database|
|00002460| 20 6f 66 20 64 69 73 68 | 65 73 2e 20 54 68 65 20 | of dish|es. The |
|00002470| 74 79 70 65 20 6f 66 20 | 6d 65 61 6c 73 20 61 76 |type of |meals av|
|00002480| 61 69 6c 61 62 6c 65 20 | 61 72 65 20 73 68 6f 77 |ailable |are show|
|00002490| 6e 20 69 6e 20 74 68 65 | 0d 27 43 68 6f 69 63 65 |n in the|.'Choice|
|000024a0| 27 20 6d 65 6e 75 2c 20 | 77 68 65 72 65 20 74 79 |' menu, |where ty|
|000024b0| 70 65 20 6f 66 20 6d 65 | 61 6c 20 6d 61 79 20 62 |pe of me|al may b|
|000024c0| 65 20 0d 0d 20 20 20 41 | 6e 79 20 4d 65 61 6c 20 |e .. A|ny Meal |
|000024d0| 2d 20 63 6f 6e 73 69 73 | 74 73 20 6f 66 20 61 20 |- consis|ts of a |
|000024e0| 73 74 61 72 74 65 72 2c | 20 6d 61 69 6e 20 64 69 |starter,| main di|
|000024f0| 73 68 2c 20 64 65 73 73 | 65 72 74 20 61 6e 64 20 |sh, dess|ert and |
|00002500| 77 69 6e 65 0d 20 20 20 | 47 6f 6f 64 20 4d 65 61 |wine. |Good Mea|
|00002510| 6c 09 2d 20 73 74 61 72 | 74 65 72 2c 20 6d 61 69 |l.- star|ter, mai|
|00002520| 6e 20 63 6f 75 72 73 65 | 20 61 6e 64 20 77 69 6e |n course| and win|
|00002530| 65 20 63 68 6f 73 65 6e | 20 74 6f 20 63 6f 6d 70 |e chosen| to comp|
|00002540| 6c 65 6d 65 6e 74 20 65 | 61 63 68 20 6f 74 68 65 |lement e|ach othe|
|00002550| 72 0d 20 20 20 43 68 65 | 61 70 20 4d 65 61 6c 09 |r. Che|ap Meal.|
|00002560| 2d 20 61 6e 79 20 6d 65 | 61 6c 20 63 6f 73 74 69 |- any me|al costi|
|00002570| 6e 67 20 6c 65 73 73 20 | 74 68 61 6e 20 a3 31 35 |ng less |than .15|
|00002580| 0d 20 20 20 59 75 70 70 | 69 65 20 4d 65 61 6c 09 |. Yupp|ie Meal.|
|00002590| 2d 20 61 20 67 6f 6f 64 | 20 6d 65 61 6c 20 63 6f |- a good| meal co|
|000025a0| 73 74 69 6e 67 20 6d 6f | 72 65 20 74 68 61 6e 20 |sting mo|re than |
|000025b0| a3 33 30 0d 20 20 20 44 | 69 65 74 20 4d 65 61 6c |.30. D|iet Meal|
|000025c0| 09 2d 20 61 6e 79 20 6d | 65 61 6c 20 63 6f 6e 74 |.- any m|eal cont|
|000025d0| 61 69 6e 69 6e 67 20 66 | 65 77 65 72 20 74 68 61 |aining f|ewer tha|
|000025e0| 6e 20 36 35 30 20 63 61 | 6c 6f 72 69 65 73 0d 20 |n 650 ca|lories. |
|000025f0| 20 20 47 6c 75 74 74 6f | 6e 20 4d 65 61 6c 09 2d | Glutto|n Meal.-|
|00002600| 20 61 20 67 6f 6f 64 20 | 6d 65 61 6c 20 63 6f 6e | a good |meal con|
|00002610| 74 61 69 6e 69 6e 67 20 | 6d 6f 72 65 20 74 68 61 |taining |more tha|
|00002620| 6e 20 31 35 30 30 20 63 | 61 6c 6f 72 69 65 73 0d |n 1500 c|alories.|
|00002630| 0d 2a 2f 0d 0d 09 09 0d | 27 3c 4c 4f 41 44 3e 27 |.*/.....|'<LOAD>'|
|00002640| 28 44 29 3a 2d 0d 09 09 | 69 6e 73 74 61 6c 6c 5f |(D):-...|install_|
|00002650| 6d 65 6e 75 28 27 43 68 | 6f 69 63 65 27 2c 20 5b |menu('Ch|oice', [|
|00002660| 27 41 6e 79 20 4d 65 61 | 6c 27 2c 20 27 47 6f 6f |'Any Mea|l', 'Goo|
|00002670| 64 20 4d 65 61 6c 27 2c | 20 27 43 68 65 61 70 20 |d Meal',| 'Cheap |
|00002680| 4d 65 61 6c 27 2c 20 27 | 59 75 70 70 69 65 20 4d |Meal', '|Yuppie M|
|00002690| 65 61 6c 27 2c 20 27 44 | 69 65 74 20 4d 65 61 6c |eal', 'D|iet Meal|
|000026a0| 27 2c 20 27 47 6c 75 74 | 74 6f 6e 20 4d 65 61 6c |', 'Glut|ton Meal|
|000026b0| 27 5d 29 2e 0d 0d 27 43 | 68 6f 69 63 65 27 28 27 |'])...'C|hoice'('|
|000026c0| 41 6e 79 20 4d 65 61 6c | 27 29 3a 2d 0d 20 20 63 |Any Meal|'):-. c|
|000026d0| 68 6f 6f 73 65 5f 6d 65 | 61 6c 28 20 61 6e 79 5f |hoose_me|al( any_|
|000026e0| 6d 65 61 6c 2c 20 27 41 | 6e 79 20 4f 6c 64 20 4d |meal, 'A|ny Old M|
|000026f0| 65 61 6c 20 4d 65 6e 75 | 27 20 29 2e 0d 0d 27 43 |eal Menu|' )...'C|
|00002700| 68 6f 69 63 65 27 28 27 | 47 6f 6f 64 20 4d 65 61 |hoice'('|Good Mea|
|00002710| 6c 27 29 3a 2d 0d 20 20 | 63 68 6f 6f 73 65 5f 6d |l'):-. |choose_m|
|00002720| 65 61 6c 28 20 67 6f 6f | 64 5f 6d 65 61 6c 2c 20 |eal( goo|d_meal, |
|00002730| 27 54 68 65 20 57 6f 6e | 64 65 72 66 75 6c 20 47 |'The Won|derful G|
|00002740| 6f 6f 64 20 4d 65 61 6c | 20 4d 65 6e 75 27 20 29 |ood Meal| Menu' )|
|00002750| 2e 0d 0d 27 43 68 6f 69 | 63 65 27 28 27 43 68 65 |...'Choi|ce'('Che|
|00002760| 61 70 20 4d 65 61 6c 27 | 29 3a 2d 0d 20 20 63 68 |ap Meal'|):-. ch|
|00002770| 6f 6f 73 65 5f 6d 65 61 | 6c 28 20 63 68 65 61 70 |oose_mea|l( cheap|
|00002780| 5f 6d 65 61 6c 2c 20 27 | 43 68 65 61 70 20 4d 65 |_meal, '|Cheap Me|
|00002790| 6e 75 27 20 29 2e 0d 0d | 27 43 68 6f 69 63 65 27 |nu' )...|'Choice'|
|000027a0| 28 27 59 75 70 70 69 65 | 20 4d 65 61 6c 27 29 3a |('Yuppie| Meal'):|
|000027b0| 2d 0d 20 20 63 68 6f 6f | 73 65 5f 6d 65 61 6c 28 |-. choo|se_meal(|
|000027c0| 20 79 75 70 70 69 65 5f | 6d 65 61 6c 2c 20 27 41 | yuppie_|meal, 'A|
|000027d0| 2e 4b 2e 20 59 61 68 20 | 4d 65 6e 75 27 20 29 2e |.K. Yah |Menu' ).|
|000027e0| 0d 0d 27 43 68 6f 69 63 | 65 27 28 27 44 69 65 74 |..'Choic|e'('Diet|
|000027f0| 20 4d 65 61 6c 27 29 3a | 2d 0d 20 20 63 68 6f 6f | Meal'):|-. choo|
|00002800| 73 65 5f 6d 65 61 6c 28 | 20 64 69 65 74 5f 6d 65 |se_meal(| diet_me|
|00002810| 61 6c 2c 20 27 54 68 65 | 20 44 69 65 74 20 4d 65 |al, 'The| Diet Me|
|00002820| 6e 75 27 20 29 2e 0d 0d | 27 43 68 6f 69 63 65 27 |nu' )...|'Choice'|
|00002830| 28 27 47 6c 75 74 74 6f | 6e 20 4d 65 61 6c 27 29 |('Glutto|n Meal')|
|00002840| 3a 2d 0d 20 20 63 68 6f | 6f 73 65 5f 6d 65 61 6c |:-. cho|ose_meal|
|00002850| 28 20 67 6c 75 74 74 6f | 6e 5f 6d 65 61 6c 2c 20 |( glutto|n_meal, |
|00002860| 27 54 68 65 20 47 6c 75 | 74 74 6f 6e 20 4d 65 6e |'The Glu|tton Men|
|00002870| 75 27 20 29 2e 0d 0d 63 | 68 6f 6f 73 65 5f 6d 65 |u' )...c|hoose_me|
|00002880| 61 6c 28 20 4d 65 61 6c | 2c 20 4d 65 6e 75 54 69 |al( Meal|, MenuTi|
|00002890| 74 6c 65 20 29 3a 2d 0d | 20 20 69 73 5f 77 69 6e |tle ):-.| is_win|
|000028a0| 28 20 4d 65 6e 75 54 69 | 74 6c 65 2c 20 63 74 72 |( MenuTi|tle, ctr|
|000028b0| 6c 20 29 2c 20 20 20 25 | 20 41 6c 72 65 61 64 79 |l ), %| Already|
|000028c0| 20 64 6f 69 6e 67 20 74 | 68 69 73 20 6f 6e 65 3f | doing t|his one?|
|000028d0| 0d 20 20 21 2c 0d 20 20 | 77 66 72 6f 6e 74 28 20 |. !,. |wfront( |
|000028e0| 4d 65 6e 75 54 69 74 6c | 65 20 29 2e 0d 63 68 6f |MenuTitl|e )..cho|
|000028f0| 6f 73 65 5f 6d 65 61 6c | 28 20 4d 65 61 6c 2c 20 |ose_meal|( Meal, |
|00002900| 4d 65 6e 75 54 69 74 6c | 65 20 29 3a 2d 0d 20 20 |MenuTitl|e ):-. |
|00002910| 4d 65 61 6c 28 53 74 61 | 72 74 65 72 2c 4d 61 69 |Meal(Sta|rter,Mai|
|00002920| 6e 2c 44 65 73 73 65 72 | 74 2c 57 69 6e 65 29 2c |n,Desser|t,Wine),|
|00002930| 0d 20 20 63 6f 73 74 28 | 53 74 61 72 74 65 72 2c |. cost(|Starter,|
|00002940| 4d 61 69 6e 2c 44 65 73 | 73 65 72 74 2c 57 69 6e |Main,Des|sert,Win|
|00002950| 65 2c 43 6f 73 74 29 2c | 0d 20 20 65 6e 65 72 67 |e,Cost),|. energ|
|00002960| 79 28 53 74 61 72 74 65 | 72 2c 4d 61 69 6e 2c 44 |y(Starte|r,Main,D|
|00002970| 65 73 73 65 72 74 2c 57 | 69 6e 65 2c 43 61 6c 6f |essert,W|ine,Calo|
|00002980| 72 69 65 73 29 2c 0d 20 | 20 73 68 6f 77 5f 6d 65 |ries),. | show_me|
|00002990| 6e 75 28 20 4d 65 6e 75 | 54 69 74 6c 65 2c 20 53 |nu( Menu|Title, S|
|000029a0| 74 61 72 74 65 72 2c 20 | 4d 61 69 6e 2c 20 44 65 |tarter, |Main, De|
|000029b0| 73 73 65 72 74 2c 20 57 | 69 6e 65 2c 20 43 6f 73 |ssert, W|ine, Cos|
|000029c0| 74 2c 20 43 61 6c 6f 72 | 69 65 73 29 2e 0d 63 68 |t, Calor|ies)..ch|
|000029d0| 6f 6f 73 65 5f 6d 65 61 | 6c 28 20 4d 65 61 6c 2c |oose_mea|l( Meal,|
|000029e0| 20 4d 65 6e 75 54 69 74 | 6c 65 20 29 3a 2d 0d 20 | MenuTit|le ):-. |
|000029f0| 20 20 65 6e 64 5f 6f 66 | 5f 6d 65 61 6c 73 28 20 | end_of|_meals( |
|00002a00| 4d 65 6e 75 54 69 74 6c | 65 20 29 2e 0d |MenuTitl|e ).. |
+--------+-------------------------+-------------------------+--------+--------+
